﻿Imports utilitiesLibrary

Public Class test_final

    Inherits System.Web.UI.Page
    Dim objDB As New DBConnect

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim sql As String = "SELECT * FROM mall_dept"
        Dim ds As DataSet

        ds = objDB.getDataSet(sql)
        lblRows.Text = objDB.getRowCount(ds)
    End Sub


End Class